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The compact, high performance 4052 Graphic Computing System 
brings exceptional power to desktop computing. 



The large display 4054 Graphic Computing System offers an 
unequaled combination of computing power and superior graphics. Its 
1 9" DVST display gives the highest resolution, highest quality graphics 
ever seen in a desktop computer. 



DESKTOP COMPUTING AT ITS BEST: 

THE 4052 AND 4054 GRAPHIC COMPUTING SYSTEMS 



by Cathy Cramer 

In April, the Graphic Computing Systems division of 
Tektronix announced two new desktop computers in the 
same family line as the 4051: the 4052 and 4054 Graphic 
Computing Systems. The 4052 and 4054 set new stan- 
dards for performance and graphics excellence combined 
into a desktop package. The 4052 is powerful yet 
compact. The 4054, the first desktop system to have a 19" 
display, has all of the processing power of the 4052, with 
the finest graphics capabilities of any desktop computer. 

Introducing the 4050 Series 

Together the 4051, 4052 and 4054 form the 4050 Series, 
the first fully compatible family of desktop systems. 



Building on the strengths of the 4051, the 4052 and 4054 
offer superior performance and graphics, without 
sacrificing any of the essential ingredients that have made 
the 4051 so successful. 
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Family compatibility is the key to the 4050 Series. All 
three 4050 Series Systems contain the same typewriter- 
like keyboard and high capacity internal magnetic tape, 
combined with a high resolution DVST display. The 
programming language for all three is enhanced BASIC, 
with device-independent keywords and built-in graphics 
language statements. And the 4051, 4052 and 4054 all 
provide flexible data communications with the GPIB 
(IEEE 488- 1975) standard interface, and the optional RS- 
232 Data Communications Interface. 

The 4050 Series family compatibilities extend even 
further/The 4051, 4052 and 4054 are completely software 
and storage compatible, a first for the desktop computer 
industry. Software and storage compatibility means all 
BASIC programs written for the 405 1 can be used on the 
4052 or 4054; including all PLOT 50 software packages, 
all BASIC user programs, and programs from the 4050 
Series Applications Library. In addition, the 4052 and 
4054 are compatible with 4051 peripherals—but we'll 
come back to that later. The important point is that the 
4050 Series family compatibilities make it easy for a 405 1 
user to upgrade to a 4052 or 4054— with little relearning, 
no reinvestment in software, and the ability. to make use 
of the existing peripherals. 

A Closer Look at the 4052 and 4054 

The 4052 and 4054 are extremely fast. Their speed 
increases over the 4051 range from 4 to 40 times, 
depending on the nature and complexity of the operation 
being performed. In general, the more complex the 
computational task, the greater the speed increases you'll 
see in the 4052 and 4054, Simple tasks like the INTEGER 
or RND function are about four times faster on the 4052 
and 4054. Slightly more complex operations like addi- 
tion, subtraction, and simple MOVE and DRAW 
graphics are six to seven times faster on the 4052 and 
4054. Heavier computation tasks like multiplication and 
division run 15 to 20 times faster; and the most difficult 
calculations of all, the trigonometric and transcendental 
functions, show speed increases of 30 to 40 times. The 
TAN or tangent function, for example, is a startling 38 
times faster on the 4052 and 4054 than on the 4051. 

The secret of the high performance of the 4052 and 4054 is 
that they both contain a new processor designed by 
Tektronix. The processor is based on state-of-the-art bit- 
slice technology, the chaining together of high speed four- 
bit chips. For the 4052 and 4054, we've linked four of 
these four-bit "slices" together, to form a 1 6-bit processor. 

This gives us two reasons for the increased speeds of the 
4052 and 4054. First, the bit-slice chips are inherently 
faster than most microprocessor chips. Second, the new 
bit-slice processor allows the 4052 and 4054 to operate on 
.16 bits at once, instead of 8 as on the 4051; and that means- 
accessing twice as much information in the same amount 
of time. 



A third'and very important factor also contributes to the 
high speeds of the 4052 and 4054. I nherent to the bit-slice 
technology is the ability to create special "microcode 
sequences" during the design phase. Operations that are 
of particular value, or that need special assistance because 
of their complexity, can be selected for coding in a lower 
level, more machine-like language, Such microsequences 
execute more directly, and therefore much faster than 
assembly language or "macrocode" sequences like those 
in the 4051. In upcoming articles, well be discussing this 
more. For now, we can summarize by saying that 
microcode sequences for floating point operations are the 
reason for the extremely high speeds of certain operations 
on the 4052 and 4054. Heavy computation tasks, like the 
trigonometric functions that show tremendous speed 
increases in the 4052 and 4054, are precisely the ones that 
benefit the most from floating point microcode. 



Memory 

The 4052 and 4054 memory architecture is new, and 
optimized for speed. Memory is divided into data and 
instruction spaces, then partioned even further into even 
and odd memory address locations, to let the new- 
processor access either 8 bits or 16 bits at once of 
instructions or data. The memory partitioning brings 
another advantage to the 4052 and 4054: increased 
memory capacity. For both the 4052 and 4054. the 
standard user memory is 32K bytes. A large memory i 
option of 64 K bytes ( 56 K user accessible) is also 
available. 

More New Features ... 

The 4052 and 4054 bring more than extraordinary 
computing power to the 4050 Series. Both offer new 
features; enhancements suggested in many cases by 4051 
users. First, the Binary Program Loader and Matrix 
Functions commands have been incorporated into the 
BASIC language of the 4052 and 4054. The functions 
come as part of the standard command set, and so do not 
require a ROM pack. Besides the added value and 
convenience of not having to insert a ROM pack/this has 
special significance for the Matrix Functions commands: 
extra speed. Bringing the matrix functions inside the 
System lets them benefit more from the fast new 



( 



TEKniques, the 4050 Series Applications Library Newsletter, is 
published bv the Information Display Division of Tektronix. 
Inc., Group*451, P.O. Box 500, Beaverton, Oregon 97077. It is 
distributed to TEKTRONIX 4050 Series users and members ot 
the 4050 Series Applications Library. 

Publishing Manager Ken Cramer 

Managing Editor Patricia Kelley 

Editor Terence Davis 

Technical Editor Dan Taylor 

Graphic Design J° hn Elhs 

Circulation Rory Gughotta 



processor. The processor can execute the commands 
directly, without having to access an external ROM pack. 
As an example, the 4052 and 4054 can invert a 20 X 20 
j matrix in 2.7 seconds. This unusually high speed is due in 
part to the addition of the INV command to standard 
BASIC 

Although the Binary Loader and Matrix Functions 
commands are new standard language elements for the 
4052 and 4054, in one sense they are not really "new." 
They are identical in syntax to the 4051 ROM pack 
commands, thus maintaining 100% language compatibili- 
ty with the 4051. 

The 4052 and 4054 do offer three completely new 
commands: 

FONT N 

CALL "MTPACK" 

CALL "WAIT", N 

The first is the FONT command, used to select any one of 
eight unique character fonts. The keyword FONT is 
followed by a digit N to select one of the numbered fonts. 
FONT is the default ASCII character font. FONT 8 is a 
special new font of particular value for generating high- 
quality final reports: it's like the default ASCII font, but 
has the "slashless" zero preferred by many for business 
and reporting applications. 

<J CALL "MTPACK" is a new utility command that helps 
maintain the reliability of magnetic tapes. As tapes age, or 
if they are heated or dropped, they may start to sag or 
"bubble" on their reels. Improperly stacked tapes can lead 
to subsequent READ errors and loss of important 
programs or data. CALL "MTPACK" helps avoid the 
problem by completely winding the tape forwards and 
backwards, thus properly restacking the entire tape. It's a 
good idea to use CALL "MTPACK" periodically, as well 
as immediately before storing important programs or 
data. 



ROM packs available immediately for the 4052 and 4054 
include an EDITOR ROM pack, a Signal Processing 
ROM pack #1, an Option 10 Printer Interface, and a File 
Manager ROM pack for the 4907 disc unit. These ROM 
packs are like the 405 1 versions, but designed to fit in with 
the new memory architecture of the 4052 and 4054. (405 1 
ROM packs won't work on the 4052 and 4054, nor can 
4052/4054 ROM packs work on the 4051, because of 
differences in internal structure.) 

As a 405 1 user, the difference you'll see in the ROM packs 
is speed. In conjunction with the new processor, 4052 and 
4054 ROM packs function at least two times faster. Many 
computation tasks like some of the Signal Processing 
ROM pack commands run up to 1 1 times faster. At the 
same time, compatibility is carefully maintained. The 
EDITOR ROM pack for the 4052 'and 4054 is 100% 
language-compatible with the 4052 EDITOR, for exam- 
ple. So those of you who've been accustomed to the 405 1 
EDITOR can make immediate use of the 4052 EDITOR, 
without ever looking at a manual. And if you already own 
a 4907 File Manager, you can upgrade it for use with the 
4052 or 4054 simply by installing the new ROM pack. 
There are no compatibility problems to consider. 



New Four-Slot ROM Backpacks 

As on the 405 1 , the standard rear panel for both the 4052 
and 4054 includes a backpack for inserting up to two 
special function or interface ROM packs. A brand new- 
option is now being offered for the 4052 and 4054, a 
backpack that can accommodate up to four ROM packs 
at once. For many users, the four-slot backpack 
represents a special convenience, because it eliminates 
their need for a ROM Expander Unit. Like the standard 
two-slot backpacks, the new optional backpack comes in 
two versions: the regular backpack with four RO VI slots, 
and the Data Communications Interface with four ROM 
slots. 
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CALL "WAIT", N is another new command for the 4052 
and 4054. It's like the 4051 WAIT command, but allows 
you to specify a parameter N, the number of seconds to 
wait before passing on to the next program statement. 
When a CALL "WAIT" command is executed, the 
BASIC Interpreter waits either for an external interrupt, 
or for the specified number of seconds to pass, whichever 
comes first. You'll find CALL "WAIT" a useful tool for 
programming intentional time delays: pausing between 
several graphic displays for example. You no longer have 
to experiment with "dummy" or false loops to pause for a 
certain length of time. 



ROM Packs 

Because they both contain the same new processor, the 
4052 and 4054 can share the same set of ROM packs. 



Peripherals 

The 4052 and 4054 are compatible with the current 405 1 
peripherals. For 405 1 owners, this makes the addition of a 
4052 or 4054 economical and convenient. The 463 1 Hard 
Copy Unit can be shared simultaneously between a 4051, 
4052 and 4054. The same 4952 Option 2 Joystick is 
compatible with all three Graphic Systems. The 4641 and 
4642 Matrix Printers can likewise be used with the 405 1, 
4052, and 4054. 

Compatibility extends to all of the G PI B. peripherals. The 
4662 and 4663 Plotters, the 4956 Graphics Tablet, the 
4924 Digital Tape Unit, and the 4907 File Manager can all 
be used with any of the three 4050 Series Systems. 

The Printers and the 4907 File Manager come standard 
with special purpose ROM packs for the 4051, but you 



can obtain them with the appropriate 4052 and 4054 
ROM packs as an option at no additional charge. The 
new ROM packs can also be ordered separately, if you 
upgrading from a 4051 to a 4052 or 4054. 
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in terminal mode, with a full-screen crosshair cursor for 
graphic input, and program selectable dot-dash vector 
patterns. And of course, the same access to PLOT 10 and 
other host-based software that the 4051 and 4052 
Interfaces provide. 



Software 

The 4052 and 4054 are completely language and storage- 
media compatible with the 405 1. In this, the 4050 Series is 
unique, and offers major benefits both for current 4051 
users, and for newcomers to the 4050 Series. 

First, for 4051 users, you're already familiar with 4050 
Series BASIC. There's no new language to learn, so the 
4052 and 4054 are immediately productive for you. No 
time lost poring through manuals, getting used to a 
completely new set of keywords. No tedious and error- 
prone conversions to a new language or storage format. 
You can simply carry over all of your 4051 program or 
data files to a 4052 or 4054. This includes BINARY as well 
as ASCII format, and disc as well as tape files. Programs 
will run the same, but much faster. (You will notice that 
timing delays intentionally coded using loops or other 
methods are much shorter. You may decide to lengthen 
them.) 

For newcomers to the 4050 Series, software compatibility 
means being able to take advantage of the wealth of 
software already developed for the 4051. For newcomers 
and 4051 users alike, it's important that all PLOT 50 
software packages and programs in the 4050 Series 
Applications Library can be used on the 4052 and 4054. 



Data Communications 

Like the 4051, the 4052 and 4054 offer Option 1 Data 
Communications Interfaces. The interfaces provide the 
same unique combination of communications modes as 
the 4051 Option 1 does: programmed I/O mode using 
BASIC keywords, communications mode with host 
transfers directly to and from the Graphic System's 
internal tape, and terminal mode, where the 4050 Series 
System acts as a Tektronix 4010 Series Graphics Ter- 
minal. 

In terminal mode, the 4052 emulates the 4012 Terminal, 
just like the 4051 does. However, communications are 
faster on the 4052, because of the faster processor. Data 
communications rates for the 4052 Option 1 Interface 
include both 4800 and 9600 baud. 

The Option I Interface for the 4054 also allows transfers 
at up to 9600 baud. In addition, the 4054 Option 1 allows 
the 4054 to enter terminal mode and act like a 4014 
Graphics Terminal, rather than like the smaller-screen 
4012. The 4054 also emulates the most commonly needed 
features of the 4014' s Option 34 Enhanced Graphics 
Module. That means superior 12-bit resolution graphics 



GPIB 

The GPIB (General Purpose Interface Bus) comes 
standard with the 4052 and 4054, as with the 4051. The 
GPIB for all three Systems conforms to the same IEEE 
488-1975 Standard, so differences are in speed only. The 
GPIB operates faster on the 4052 and 4054, as a result of 
the basic speed increases of the new Systems. If you've 
been using the GPIB to collect data from a device, you'll 
be able to read about three times as many samples per 
second using the 4052 or 4054, You may also notice that 
the GPlB-compatible 4956 Tablet digitizes faster, detec- 
ting more points while in STREAM or continuous mode. 

4054 Graphics and Alphanumerics: Like No Other 
Desktop Computer 

The 4054 has all of the computation power and added 
features of the 4052, with impressive enhancements in 
graphics. The most striking change is the display. The 
4054 has a 19" DVST display, the largest of any desktop 
computer. That's over 13 million addressable points, for 
the finest detail in both graphics and alphanumerics. g 

1 

Alphanumerics on the 4054 are "stroke-generated." 
Characters are drawn as vectors, not using dot patterns as 
on the 4052 and 4051. The stroke-generated characters 
are clean and crisp, and provide extremely high quality 
hard copies. I n addition, characters on the 4054 can be in 
any one of four character sizes. Either directly from the 
keyboard or under program control, you can use a special 
new 4054 keyword, CHARSIZE, to select one of the four 
character sizes. The sizes range from 35 lines to 72 
characters each, to 64 lines of 132 characters each. You'll 
find the multiple character sizes are helpful in a variety of 
applications. Their uses include enhancing graphs by 
differentiating titles, axis labels, and text annotations by 
character size. And the small character size with its 132 
characters per line makes the 4054 the only desktop 
computer that can be used to preview computer line 
printer output. 

For graphics, the 4054 has a new vector generator. It's a 
constant rate vector generator, unlike the "constant time" 
vector generator of the 4052 and 4051. On the 4052 and 
4051, vectors take the same amount of time to draw, 
regardless of their length. Not so on the 4054. On the 
4054, vectors are drawn at a constant rate of 
15,000 cm/sec, so short vectors take considerably less £ 
time to draw than long vectors. This saves drawing time, 
especially for the average application, where vectors 
normally are 2 to 3 cm long. You'll find that graphics on 
the 4054 draw up to 50% faster even than on the 4052. 



And that means up to ten times faster than on the 4051. 

As a special graphics feature, the 4054 offers selectable 
dot-dash patterns for drawing vectors. You can choose 
any one of thirty-six unique patterns for subsequent 
vectors, using a new 4054 keyword DASH. 

Finally, for graphic input the 4054 has a full-screen 
crosshair cursor, instead of the blinking arrow as on the 
4051 and 4052. The crosshair cursor appears when the 
POINTER command is executed, and can be positioned 
on the display using either the 4952 Option 2 Joystick, or 



two new thumbwheels on the far right of the 4054 
keyboard. 

The next issue of TEKniques will tell more about the new 
4054 graphics features. As you begin to use the 4052 and 
4054, TEKniques will describe your interesting and 
unique applications that take advantage of the new 
capabilities. 

Your local Tektronix Sales Engineer will be happy to 
discuss the features of the 4052 and 4054 in more detail. 




The 4050 Series Graphic Computing Systems 



Graphics Display Treatment Planning on the 4051 Aids 
Radiotherapists 



by Patricia Kelley 

The University of Utah Medical Center at Salt Lake City- 
has developed a radiation treatment planning system 
based on the 405 1 Graphic System. It is one of the 
methods for approaching cancer therapy on an individual 
basis. Although this approach began twenty-five years 
ago, refinements have come about only recently, with the 
technical advances of body scanners, electron arc 
therapy, and low-cost stand-alone computers. 

Dr. J. Robert Stewart, Professor and Head o( the 
Division of Radiation Oncology, describes progress in the 
field of radiation therapy since the 1950s. It was the 
discovery of cobalt 60 that gave researchers the tool of 
higher energy. The initial impact of this change was 
getting a higher dose of radiation into a deep-seated 
tumor than ever before. But along with the improvement 
of tumor control, a whole new group of radiation 
complications reared up. 



Dr. Stewart said that prior to this time the dose-limiting 
organ was the skin; it was not realized that the liver and 
heart were radiation sensitive. However, these organs as 
well as the lungs, kidneys, and other tissues were found to 
react to the higher dosages. He pointed out that subse- 
quent research resulted in two-fold knowledge: the dose it 
takes to control different types of tumors, and the 
damaging dose for different tissues and organs. 

This knowledge, coupled with the technical advances, 
enabled approaching treatment on an individual basis. 



The Tools 

4-MV Linear Accelerator 

At the Medical Center a Varian Clinac-4, a four megavolt 
machine, produces X-rays for treatment of cancer. The 
patient lies supine on a motorized, moveable treatment 
couch, his position aligned with the aid of laser lights 



mounted on the walls and recessed in the ceiling (Fig. 1). 
This alignment allows reproducible results from day to 
day. The Clinac-4 rotates to the predetermined treatment 
angle, allowing the patient to remain in a fixed position 
(Fig. 2). Wedges of varying thickness and angles modify 
the shape of the curves (Figs. 3 & 4). These are slid into 
place below the machine head. Outside the treatment 
room, a console and closed circuit television monitor the 
treatment and the patient (Fig. 5). 




Fig. 1 . Lou Fadell, student technician, demonstrates patient posi- 
tioning for Clinac-4 X-ray treatment. 





Fig. 3. Wedges with angles of 1 5, 30, 45 and 60 degrees modify 
dose distribution to be received by the patient. 
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Fig. 4. Isodose distrubitions for open field, 1 5° wedge, 30° wedge, 
45° wedge, 60° wedge. 







FiQ. 2. The Clinac-4 rotates to gain proper X-ray angle. 

Because the table and X-ray machine are adjustable, 
a patient remains stationary during treatment. 



Fig. 5. 



The console controls radiation and the closed circuit 
television monitors the patient. 
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18-MV Linear Accelerator 

A newer, more powerful high energy machine, the Varian 
Clinac-!8, produces X-rays at 10 million volts, or emits 
electrons at a range between 6 and 18 million volts 
(Fig. 6). Four- to five-inch thick tungsten collimators 
within the head of the machine adjust the size of the 
radiation beam from to 35 cm. Individually shaped 
blocks composed of a lead alloy, cerrobend, mounted on 
plastic shelves (Fig. 7) can be slid into place below the 
machine head*. These devices shield the surrounding 
organs and tissues, limiting radiation to the tumor area 
only. 




Fig. 6. The Varian Clinac-1 8 produces X-rays and electrons for 
treating cancer. Tilly Gibbs, radiation therapy technician, 
demonstrates patient placement. 




Fig. 7. Cerrobend wedges shape the beam field protecting tissues. 
The plastic shelf slides into the "handles" fastened to the 
head of the Clinac-1 8. Note the slots for the shelves in 
Figure 9. 

♦This statement applies to the Clinic-4 as well. 



Electron energy, unlike X-rays, can be finely adjusted for 
the depth of a tumor and is used for tumors less than 6 cm 
below the skin (Fig. 8). For instance, a tumor just under 
the skin can be treated with electrons without radiating 
underlying tissues. Or a chest wall can be treated without 
radiating the lungs underneath. 




Fig. 8. Isodose distrubitions for electron energies of 6, 9, 1 2, 1 5. 1 8 
million electron volts. Shown for comparison is the isodose 
distribution for 10 megavoit X-rays. 



As with the Clinac-4, Clinac-18 patients are positioned 
with the aid of laser side lights and ceiling lights. Both 
therapy machines can also be rotated in a 360° arc (Fig 
9). 




Fig. 9. The Clinac-1 8 rotates for desired treatment angle. 



Simulator 

A diagnostic machine with fluoroscopy, the Toshiba 
simulator is capable of reproducing the beam parameters 
of the treatment machines with diagnostic X-ray quality 
films. The simulator is the department's planning tool, 
displaying via film the anatomy encompassed by a 
simulated beam (Fig. 10). 




Fig. 10. The Toshiba Simulator provides a double check on the 
computer dosimetry. It also is capable of 360° rotation. 



CT Scanner 

One of the most sophisticated pieces of cancer therapy 
equipment is the Varian body scanner (Fig. 1 1). As the 
bed upon which the patient lies slowly moves into the 
tank, a rotating X-ray tube at the mouth of the tank scans 
horizontal sections of the body. The varying composition 
of body tissues results in different intensities coming from 
the beam passing through the body. The Varian computer 
reads these intensities and constructs a matrix of points 
for each section which it then reconstructs into a picture 
on a graphic screen. Thus, doctors may examine the 
internal structures of each patient, section by section. 



The 4051's Part 

The radiation dose during treatment is critical. If it is not 
high enough, the desired cure wont be achieved; if it is too 




Fig. 11. A patient is positioned so the portion of anatomy to be 
scanned is entering the mouth of the body scanner. A 
rotating X-ray tube scans a cross section of the patient. The 
computer takes readings and reconstructs a picture of the 
intricate internal structures. 



high, surrounding tissues may suffer. Dr. Dennis D. 
Leavitt, with the help of Richard Sanborn and Judy Orr 
at the University's Department of Radiology, and Ralph 
Wilson of Transera Corporation, has written several 
programs to evaluate the alternatives within different 
treatment plans. By simulating techniques on the 405 1 
and portraying the results on the graphic screen or 4662 
Plotter, the optimum treatment plan can be developed. 



External Beam Treatment Planning Program 

The External Beam Treatment Planning program is used 
most heavily in the University's Radiation Department. 
Using the 4051 to simulate varying radiation beam 
energies, beam types and their position during treatment 
relative to the individual patient enables rapid evaluation 
of alternate treatment plans. 

A CT scan film of the tumor area is placed on a lighted 
tablet. The patient contour and tumor is digitized and 
data on internal structures, radiation beams, and 
reference points are entered t hrough the tablet or the 405 1 
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keyboard. The data is displayed on the graphic screen 
(Fig. 12) and any corrections are then made. 



ft«tt PATIENT NAME :mp. CEHO ttltt 

?FhM» unit ssd width length wcgi 

1 CL18 108. 8.3 e.e 9 

2 CL18 leo.fl 8.0 8,0 a 
? CL18 100.0 8.0 8.8 
* CL 18 100.8 8.8 8.8 8 

»»r CORRECT rtHV BEAU C«TA ? YES OR NO: 



V ANGLE WEIGHT 

8.01 278.8 108.8 

8.81 98,9 188.8 

8.82 188.8 188.0 
8.63 8.8 188.8 




Fig. 1 2. The patient contour, reference points and beam parameters 
entered into the 4051 are displayed on the graphic screen 
for verification. 



The program calculates the dose throughout the patient 
contour, one beam at a time, with corrections due to 
internal structures such as bone and lung whose densities 
are different than soft tissue. After calculation, the dose 
contribution of each beam, multiplied by that beam's 
weighting, is summed with contributions from the other 
beams to tally the total dose at each calculation point. The 
maximum value is displayed on the graphic screen along 
with patient contour, beam sizes, positions and direc- 
tions. As the operator keys in isodose levels, the 4051 
draws the contour lines corresponding to those levels 
(Fig. 13). A tabular listing of all relevant beam 
parameters, with total doses at the reference points, may 
be copied for the patient's chart (Fig. 14). 
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Fig. 1 3. Contour lines trace the various isodose levels throughout 
the treatment area. 



PhTIEHT 


NuME : 


MR. DEMO ttt 


tt 








UNIT 9S0 
CL18 108.13 
CuIS 188.8 
CL18 108,8 
Ci.13 108.8 




WIDTH 
8.0 
3.0 
3.0 
8.8 


LENGTH UEDGEt 
8.8 8 
3.8 8 
6.8 
8.8 


X 
0.01 
Q.dZ 
0.00 
0.92 


9.91 
8.81 
9.82 
9.83 


ANGLE 
278.8 
98.8 
189.8 
8. 8 


WEIGHT 
188.9 
109.9 
108.8 
199.9 


2 3 




4 


BEAM • 
3 6 7 





9 


.19 


TOTAL 


8 86.6 66 
1 88.3 78 

9 73.4 73 


4 
6 
8 


66.3 

36.2 
59.8 










29*. 3 
288.4 
293.3 
284.2 
232.9 


4 72.3 39 
1 ?3.0 36. 
4 78.6 53. 


2 
6 


60.2 
79~. 1 











<»«. 1 98.3 38.4 70.8 



ttt TO CHANGE BEAM WEIGHTINGS. PRESS ttt 

ttt -0 DISPLAY ISODOSES, PRESS 1 ttt 

"tt TO MODIFY OTHER BEAU PARAMETERS, PRESS 2 ttt 

tt POP FIN€ MATRIX CALCULATION, PRESS 3 ttt 



ttt FOP OPTIMIZATION, PRESS 



Fig. 14. 



Beam parameters and total dose at the reference points are 
available in a table. 



At this point, the individual beam parameters may be 
manipulated for "what if" results. A final option modifies 
the individual beam weighting factors to minimize the 
variation between the total dose at each reference point 
and a desired dose at that reference point (Fig. 15). 
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Fig. 1 5. After the operator enters the total desired dose (200) from 
all beams at reference point 1, the program considers beam 
parameters and displays the beam weights and dose 
distrubitions. 

To allow more accurate beam profile data, an interface 
was developed between the 4051 and a Scanditronix 
water phantom and film densitometer. Measured data 
could then be transmitted directly from the water 
phantom to the 4051. This avoids the potential errors 
introduced by hand tracing isodose profiles. 

Typical treatment plans may require two to eight external 
beams. The program is configured to handle a maximum 
of 10 external beams. 

Rotational Beam Treatment Planning Program 

This program is an extension of the External Beam 
Treatment program described above. The program 



simulates a rotating beam by calculating a series of "fixed" 
beams, equally spaced through the arc. The weightings 
are adjusted so the total beam intensities are equal to the 
actual intensity of a rotating beam. 

Irregular Field Program 

Primary blocking, done by setting the machine 
collimators to a predetermined size, is only capable of 
providing square and rectangular shaped fields, whereas 
secondary blocking allows individualization of the beam 
shape. When secondary blocking, such as the individually 
tailored cerrobend blocks described earlier, is used to 
define the beam, this program incorporates their effect 
into the model. The calculations include doses at points in 
other areas, in addition to those along the central axis. 
The result is a good estimate of doses to shielded organs as 
well as doses in the primary field. 

On the tablet, the field and points of calculation are 
digitized from an X-ray film exposed by the beam during 
the actual patient treatment. Other parameters are 
entered from the keyboard. The field, calculation points 
and dose rates for each point are displayed on the screen 
or plotter ( Fig. 16). A tabular plot details the scatter doses 
and primary doses (Fig. 17). 
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Fig. 16. 



A plot depicts an irregular beam field defined by collimators 
and wedges along with the doses at the reference points. 



IRREGULAR FIELD DOSE ANALYSIS 






Poti«nl Nom: DEMO 








TrtoUant Unit: CLINAC 4 








Fitld D«scriplioo; HANUE 








Centre I Axis SSD = 1 18 c. 








X Collator: 2S.5 ca 








Y Collimator: 32 ca 








Troy Transmission Foclcr ■ 98 








Calibration Factor- 8 966279864311 Rods/H.U. 






Calibration Distanc* 81 c» 








POINT SSD DEPTH CaL. OFF SAR 


TAR8 AIR SCATTER PRIMARY TOTAL 


* (CM) (CM) FACTOR AXIS 


DOSE DOSE 


DOSE 


DOSt 


FACTOR 


RADS/ RADS/ 


RADS/ 


RADS/ 




N.U M.U. 


M.U. 


M.U. 


I (18 88 7.7S ! .822 1.880 0.241 


680 468 0.113 


0.318 


0.431 


2 108 80 9.00 i.022 1.964 8.225 


8.632 8 504 0.113 


0.385 


0.418 


3 186 50 ie.ee 1.022 1.144 e.iss 


9 598 8.546 0.101 


0.281 


0.J82 


4 112.ee 7,ee 1.022 1.124 0208 


8.718 8.515 0.107 


9 335 


442 


5 114.00 6.25 1.822 t .974 0.210 


0.742 8 482 0.191 


9.344 


0.44b 


6 112.80 5.58 1.822 1 187 0.157 


9 776 8 520 9 082 


8 381 


9.463 



Fig. 17. A table lists the irregular field data. 



Interstitial-lntracavitary Dosimetry and Seed 
Implant Programs 

Treatment of cancer of the uterus or cervix are examples I 
of treatments that require implanting the radiation 
source, leaving it until the desired dose is achieved. A 
collection of computer routines determine dose rates and 
distributions for up to 20 tubes or needles, and for seed 
implants in multiples of 50 seeds with no upward limit. 
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Fig. 1 8. The 405 1 displays the source locations and reference 
points for an intracavitary treatment plan. 



The source locations and calculation points are digitized 
into the 4051 through the tablet, and displayed on the 
screen for verification (Fig. 18). Source loadings may be 
changed and the result analyzed (Fig. 19). Figure 20 
depicts the calculation points on the coronal plane. A 
quick check tells how many hours are required to achieve 
the desired dose rate. 



:.MF'U 7 E? GENERwTED C'GSE I'ALUES 



^■PiIE hCTIOIYy ACTIVE LENGTH 



*A EC. 

- '. - 1 5 

Aj-ie 

A4»!5 
A5-15 



1.5 
1.3 
1.5 
1.5 



DOSE PATE (RAD'I 
54,9 
53.9 
13.9 
16.3 



NEW SOURCE ACTIVITY (YES 0* M0)T 



Fig, 1 9. The source loading can be manipulated to determine the 
best rate. 
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PATIFNT'S NAMF MRS 
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Fig. 20. 



Graphics help to determine location of radiation distribution 
and how many hours it will take to get the desired rate. 



Prognosis 

Dr. Stewart points out that improved diagnosis, im- 
proved surgical management, and chemotherapy con- 
tribute to the cure rates for cancer, with the improved 
radiation techniques which are the cornerstone for 
treatment of many forms of cancer. With new technology 
and knowledge affording precise control over the location 
and amount of radiation for each patient, the control 
rates have about doubled for several of these types of 



cancer and in some the improvement is even greater. For 
example, in the 1950s Hodgkin's Disease universally was 
considered to be fatal. Textbooks now quote a 75% cure 
rate; the rate zooms to 90% if the disease is caught during 
favorable stages. However, Dr. Stewart cautioned that 
overall cancer statistics are not as good since lung cancer 
incidence keeps rising and its cure rate being very low 
skews the entire picture. 

While radiation therapy treatment planning has been 
around for awhile, it has been only on high-cost timeshare 
systems or expensive stand-alone minicomputers. 
Smaller hospitals and clinics were unable to justify the 
treatment planning for day-to-day applications. Because 
of Dr. Leavitt's efforts, with the support of his associates 
and the University, software has been developed for the 
low cost 4051 system permitting such treatment planning 
in usable, simple routines for application in smaller 
communities. The result will be a substantial upgrading of 
the quality of radiation therapy available to the general 
public. Jsp 



Editor's Note: The interview with Dr. Dennis D. Leavitt 
and tour of the Radiation Department of the University 
of Utah Medical Center was arranged by John Hess, 
Tektronix Sales Engineer at Salt Lake City. Dr. Leavitt 
provided interviews with Dr. J. Robert Stewart, Judy Orr 
and other personnel working with the equipment. 



Editor's Note 



Back Issues Available 

Did you miss an issue of TEKniques, from Volume 1 or 2? 
We have back issues on hand in the TEKniques office. If 
you'd like to receive a copy of a previous issue of 
TEKniques, drop a note to the Applications Library 
serving you; Library addresses are located at the back of 
each TEKniques issue. 



Program Tip Exchange 

Send in your programming tip. Any one of the following 
4051 Applications Library programs* will be yours when 
it's published. Simply jot down a brief description of the 
function, the code and your choice of program. Mail it to 
the 4050 Series Applications Library serving you; Library 
addresses are listed at the back of each TEKniques issue. 



5I/00-0I0I/0 
51/00-0702/0 
51/00-0715/0 



51/00-5503/0 
51/00-7002/0 
51/00-8006/0 



51,00-1401 
51 00-1402 
51 00-5401,0 

* Documentation and listing only. 



5 1 00-9505/0 
51 00-9511/0 
51 00-9521/0 



Questionnaire in This Issue 

This issue contains a list of questions that can be the basis 
for a feature application article. If you've been thinking 
that your application might make an interesting story, let 
us know. We'll be glad to help. Take a look at "Your 
Application Article: A Place to Start." 



New Catalogs Coming 

New catalogs are being prepared for the 4050 Series 
Applications Library of software. These catalogs will be 
distributed with the June issue of TEKniques, so watch 
the mail. New programs will be in the catalog; they'll be of 
interest to you. J Sjp 
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Programming 
Tips 




CALL "DUP" and CALL "COMPRS" 
in 4907 File Management 

by Jack Gilmore 
Tektronix, Inc. 

For file management, a CALL "DUP" command has 
many advantages over a CALL "COMPRS" command. 
When a disc is duplicated, several "clean-up" operations 
take place that may not occur during a compress 
operation: 

1. Files may be shortened to just fit the data stored in 
them, (by specifying the last parameter of DUP as I). 

2. Each file is made contiguous again (after file expan- 
sion on the original disc caused the files to scatter). 

3. All unused space is collected into one block. 

4. Library names with no files in them are deleted, thus 
recovering more space. 

5. The system verifies that all data on the disc can be 
read. Files that cannot be copied correctly are 
reported (Error Messages 32 or 34), and copied as well 
as possible. 

Use the disc compress (COMPRS) command only after a 
"no space error" occurs— Message 55— during a CREate 
command with a contiguous attribute specified. CALL 
"CMPRS" may be able to make one whole space on the 
disc that is large enough to hold the file in question, but it 
may be at the expense of increased access time to other 
files on the disc. The CALL "COMPRS" command is not 
intended for overall file clean-up activities, but only as a 
last resort when CREate fails with the contiguous 
attribute specified. 



Extending The Tape File Header 

by Ed Sawicki 
Tektronix, Inc. 
Long Island 

The first 256 byte physical record in a 4051 tape file 



contains the 42 byte header record (plus CR and DC3 
characters). The remainder of this physical record can be 
used for storing a program name or a program descrip- 
tion. It can also be used as a "hiding place" for data, since 
it cannot be seen during a TLIST and cannot be accessed 
by BASIC when in header mode. One caution: don't 
exceed a total of 254 bytes for the combined header. 

The example program demonstrates how the extended 
header can be created. To access the extended header 
record, go into non-header mode, FIND the tape file and 
execute an INPUT @33:AS,AS. The string variable AS 
will contain the extended header record. 



99 REM * EXTENDED HEADER PROGRAM * 

108 DELETE A*, I* ^ , . .. . -rv ' fK 

119 REM CAUTION: File destruction ocean, if to ta 1 length 

128 REM of Af and I* in 1 x r,« 280 exceeds 254 byte*. 

130 DIM Af C254>, If <218> 

148 REM Make a Carnage Return 

158 Cf«CHR<13> 

168 PRINT 'Enter fill nunber : | 

178 INPUT F 

188 REM Set No Header Mode 

198 PRINT f33,8:8te,l 

208 FIND F 

218 REM Get the old header 

229 INPUT 933:Af 

238 REM Add a CR and DC3 

248 AS-AftCf 

258 Af-Afl"S" w M 

268 PRINT "Enter extended header.: "I 

278 INPUT 1$ 

288 Af«AflIf 

298 FIND F 

399 REM Print the entire header record 

318 PRINT §33:Af 

328 REM _, fcW . , , 

338 REM Now 90 back and read the extended 

348 REM header for our exanple 

358 FIND F , , '„ 

368 REM Read the 'real' header 

378 INPUT t33:A* 

388 PRINT Af 

398 REM Read the extended header 

488 INPUT 933:** 

418 PRINT Af 

428 REM Rertore no header node 

438 PRINT #33,8:6,8,8 
448 END 



C 



Don't forget to restore header mode! 

If the extended header contains file names, a short BASIC 
program can be written to do an "extended TLIST." 



First Physical Record (256 Bytes) 



Second 
Physical 
Record 



Header 
Record 
(42 Bytes) 






Extended 

Header 

Data 
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Salvaging Accidentally Re-MARked 
Files 

by Jay K. Marshall 

Sangamo Energy Management Division 
Atlanta, Georgia 

and Herman D'Hondt 
Tektronix, Inc. 
Sydney, Australia 

TEKniques Vol. 2 No. 3 carried a short routine to salvage 
re-MARked files. Both Jay K. Marshall and Herman 
D'Hondt (the author) have sent in updates to that tip. The 
best of both of their routines were combined to produce 
the following program (Fig. 1). In addition, Mr. Marshall 
suggested a technique using the EDITOR ROM and Mr. 
D'Hondt has a routine for ASCII -files only. 

In the previous tip, on EOF the 4051 searches for a file 
behind the new LAST file. During the search, the 4051 
counts the number of headers. When it reaches one, it 
checks the file number in the header against the file count 
because it's in header mode. If the two numbers don't 
match, the 4051 generates an error and returns to the 
loadpoint. 

The following program, though still fairly simple, over- 
comes this problem. It requires two passes of the tape. In 
the first pass, it accesses all files beyond the new LAST file 
in non-header mode, changes each header so the file 
numbers will be the ones the 4051 thinks they should be, 
and prints the old and new headers to the screen. On the 
second pass, you can access the files in header mode, load 
the program data and copy it to another tape or disc. If 



199 REH N-Nu*b«r of ntw LAST file 

lie m-4 

129 ON EOF <Q> THEH 388 

138 PRINT #33,8:8,8, 1 

140 REM Find *cw LAST file 

138 FIND N 

168 INPUT 033:A$ 

178 CO TO 168 

388 PRINT "OLD NEW" 

318 REH Now rcnunbcr file* to be retrieved 

328 CMCHRU3) 

338 FOR K-2 TO 236 

348 FIND N+K 

338 INPUT #33:A$ 

368 E$>S£G<A*,9,1) 

378 IF Et«"L" THEN 498 

388 Gt-SEG<A«,1,38) 
398 PRINT Gtl 

488 B«-STR(N*K> 

483 IF UAL(B«>>9 THEN 410 

483 Bf-B*i" • 

418 A«-REP<B*,1,LEN<B# )) 

428 A$-AftC* 

438 At-A«4"S" 

448 G*-SEG<A*. 1,38) 

438 PRINT Gf 

468 FIND N*K 

478 PRINT 033:A* 

488 NEXT K 

498 PRINT "FINISHED" 

389 PRINT §33,8:8,8,8 

518 PRINT *JYou «aw now find and load any file fro* 

528 PRINT "to '"|N*K-11"'.CGC" 

538 END 

600 REH N-NEH LAST FILE 

618 N»4 

628 ON EOF <0) THEN 678 

638 PRINT 033,0:0,8, 1 

640 FIND N 

630 INPUT 033:At 

668 GO TO 630 

(578 PRINT #33.0:0,0,0 

690 STOP 1 " V ° U M * V H0W ACCESS V0UR NEXT FILE " 



"|N*2|"-| 



you don't have a 4924 Tape Drive or 4907 Disc system and 
have to switch tapes in the 405! drive, statements 600 to 
690 must be executed to access these files. 

Depending on the location of the new LAST file in 
relation to the overwritten file, you may be able to access 
the overwritten file by inserting the following statements 
into the program. Note that AS gives you a "listing" of 
your program. However, control characters are treated 
literally which results in a screen PAGE should a 
CONTROL L be in anv statement. 



200 REH Change target line in statement 120 to 200 

210 REH Find file overwritten by LAST file 

220 FIHD N>1 

238 PAGE 

248 OH EOF C0) THEH 308 

258 INPUT #33:A* 

268 PRIHT A* 

278 GO TO 238 



Fig. 2. 



Inserting this code into the above routine may retrieve the 
partially overwritten fiie. 



Again, depending on where the new LASTfile is sitting in 
the overwritten file, it may be possible to OLD in what 
remains of the overwritten program using the 4051R06 
EDITOR ROM. Insert the EDITOR ROM into the 405 1 
backpack and issue the following commands. 



PS I NT $33,9:9,9,1 

CALL "EDITOR" 

FIHD t» 

INPUT <Iiiu€ conMand until HT error 9tn«rat«d) 



Fig. 3. Using the EDITOR ROM and issuing these commands wil 
bring you to the end of the new LAST file. 



Then find the n+l file and OLD it in. These results will be 
displayed. 



0Ri#33,e:e,e,i 

CALL "EDITOR- 
FIND 4 
INPUT 

4 LAST 
INPUT 






3 




LAST 
INPUT 








3 


4 


LAST 
INPUT 








3 


4 


LAST 
INPUT 








3 


4 


OR ERROR 

D«vic« at EOF - 

INPUT 

lEDITOR ERROR 

PIT File - error 

FIND 3 

OLD 


trror 
nunb«r 


nu.Mb«r 
143 


146 


EDIT 



Fig. 1 . This routine will retrieve marked over files beginning with 
the first full file after the new LAST file. 



Fig. 4. It may now be possible to OLD in the partially overwritten 
file. 
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Alternatively, but only for ASCII programs and data, it's 
possible to access the files on the first pass in non-header 
mode, read the whole file into a large string variable, 
delete the header and other unwanted characters at the 
beginning and transfer the string to another tape. 



118 OH EOF <e> THEM 180 

120 PRINT #33,e:0ie,t 

130 REH 3 IS THE HEW LA3T FILE 

140 FIND 3 

138 PRINT t33,0:O,0f8 

160 INPUT t33!Af 

180 REM T THE 6 F0LL0WIHG ROUTINE WILL DUMP- AM- ASCII FILE 
190 REM INTO ONE LARGE STRING. 

1*9 REM §S F HUST BE LARGE ENOUGH TO ACCOMMODATE THE 

228 REM LARGEST STRIHG IM THE FILE 

230 DIM D*<3a0)fCf<l).Bf'MEMORY-300> 

240 B*"** 

230 C*-CHR<13) 

2*0 REM H FIND 3 THE 8 DESIRED FILE IN MOM-HEADER MODE 

298 FIND 5 

298 ON EOF <0> THEN 340 

308 INPUT t33:D« 

310 Di-OUCf 

320 Bf»REP<Of,l+LEH<Bf >,0> 

340 ReVnOM REMOUE THE FILE HEADER FROM 6f 

330 B»-SEG<B*,23?,LEN<Bf>-23<S> 

368 REM NOW STORE B* ONTO ANOTHER TwPE 

378 PRINT #33,8:8,8,0 



Fig. 5. ASCII program and data files may be recovered by inputting 
them into a large string variable. 

While more complicated than the original, these routines 
are still far simpler than alternative ways of accessing lost 
files. And, of course, the best method is to follow the 
accepted programming practice of backing up program 
and data tapes. 



Shading Routine Update 

by John Carter 
Tektronix, Inc. 
Santa Clara, CA 

TEKniques Vol. 3 No. 1 carried the programming tip 
''Shading Routine for Complex Shapes." Line 220 of that 
routine should be corrected to read: 

220 DIM P«.2iN>,M<2tNfi>,X<N>fPl<2> 

With X dimensioned to N-l, the program will fail at line 
500 on a dimension error if the shape of the polygon 
causes exactly half as many draws per sweep as there are 
sides to the polygon. For example, if the sides of the 
polygon are six and the shape of the polygon is a block 
letter N, then the program must shade three areas in one 
sweep: 




Extended String Input 

by Chuck Eng 
Tektronix, Inc. 

This quick routine overrides the 72 character buffer 
limitation when inputting strings. If you use this routine, 
you must incorporate any code peculiar to your own 
needs, such as error checks, data correction and so forth. 



166 DELETE At 

110 REM L-NUMBER OF INPUT CHARACTERS 

129 L-ieee 

130 DIM A*<L>.Zf<l> 

149 PRINT "PRESS RETURN TO END- 

159 A$«- M 

169 GIN XI, Yl 

1?9 X2-X1-1.793 

189 FOR 1-1 TO L 

199 POINTER X,Y,Zt 

299 IF 2*<> mm THEN 249 

219 REM END OF INPUT, EXIT LOOP 

229 I-L 

239 GO TO 319 

249 A$«A*iZt 

239 X2-X2+1.793 

269 IF X2<129 THEN 299 

279 X2«Xl 

289 Yl-Yl-2.81 

299 MOUE X2,Y1 

399 PRINT Z$\ 

318 NEXT I 

328 END 



Underlining 

by Paul Brubacher 
Project Engineer 

Sinclair Radio Laboratories Limited 
Concord, Ontario, Canada 

When printing out several columns of numbers on the 
4051 Graphic Screen, it's difficult to follow one line of 
type across the page. The following routine shows a 
method of drawing a line between lines of type. By 
including the counter k C\ it's possible to underline every 
third line. 



< 



199 


C— 2 








119 


FOR I«9 TO PI 


STEP 


9. 


91 


129 


IF C THEN 189 








139 


C— 3 








148 


GIN X.Y 
MOUE 9,Y-9.2 








139 








169 


RDRAM 139,9 








179 


MOUE X,Y 








189 


PRINT I,SIN<I) 


fCOS(X> 


tl*l 


199 


C«C*1 








289 


NEXT I 








219 


END 









Dynamic Memory Management- 
Arrays 



by Chuck Eng 
Tektronix, Inc. 



I Do you have an array to which you'll be adding an 
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unknown quantity of data values? Use the 405 l's dynamic 
memory capability. First, dimension the array for some 
maximum value (statement 330). Then input from tape 
*\ the number of data points, n (statement 350); redimension 
your array to fit the data values on tape (statement 360) 
and bring those values into your array (statement 370). 
Now redimension to the maximum (statement 380), and 
you can start keying in your additional data (statement 
400). Keep track of the number of data points by adding 
to n (statement 430). When finished, redimension the 
array to n (statement 460); save n and the data on tape 
(statement 480). Jg) 



299 Pin Conitruct initial array on tap* 
218 FIND 1 

220 PRIMT §33:2 
238 PRINT t33M0,20 

300 REM Ad* to Array 
310 DELETE A 

320 Ml-39 
-330 DIH A<M1> 
340 FIND 1 
330 INPUT t33:N 
360 DIM A<N> 
370 INPUT 033: A 
330 DIM A(N1> 



390 PRINT 'LWh«n 
■" 'Enttr 



400 PRINT 

410 INPUT A* 

420 IF A*-" - TNEN 460 

430 N-M+l 

440 A(H)-UAL<A#) 

450 GO TO 400 

460 DIH ACM) 

470 FIND 1 

480 PRINT 033!N,A 

490 END 



finished orcn CRETURN3 without an «ntryj" 
ACIN+U •)• "| 
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Basic 
Bits 




List by Pages 

by Dr. John W. Senner 

Oregon Regional Primate Research Center 
Beaverton, OR 

When writing programs longer than 50 lines, it is often 
convenient to list page-sized segments. This can be done 
automatically by including a series of PAGE; LIST 
mmm, nnn; and END statements in the USER- 
DEFINABLE KEYS segment of the program as shown in 
this example. This assumes that if User-Definable Keys 6 
through 20 are used in your program, they will be coded 



1 REN Co around listing routine* t 

z go to iee 

24 PAGE 


o run progjran 




25 LIST 


1,23 




26 END 






28 PAGE 






29 LIST 


189,268 




38 END 






32 PAGE 






33 LIST 


269,339 




34 END 






36 PAGE 






37 LIST 


390,689 




38 END 






40 PAGE 






41 LIST 


689,897 




42 END 






64 PAGE 






65 LIST 


887,1887 




€6 END 






68 PAGE 






69 LIST 


1897,1297 




79 END 






72 PAGE 






73 LIST 


1297,1597 




74 END 






?€ PAGE 






7? LIST 


1397,1797 




78 END 






80 PAGE 






81 LIST 


1797,1997 




62 END 







after their use as a programming aid has terminated. Also, 
note that statement numbers are incremented by 10. 

Several points to keep in mind: 1) Don't include more 
than 20 lines in a page, which allows you room to make 
changes without erasing the page. 2) Initially, use 
"unusual" line numbers as parameters of the LIST 
command, as shown in lines 64 to 82, so that the number 
of lines in a page is not affected by making insertions and 
RENUMSERing. Later, after you are satisfied with a 
particular segment, you might want to change the 
parameters of the LIST to display only that segment, as 
shown in lines 24 to 42. 3) Overlap the pages by one line so 
that an inserted line can never "disappear" between pages. 
4) Delete these lines when the program is finalized. 



Plotter LOAD Button Test 

by Bob Wheeler 
North Ogden, Utah 

When developing programs that use the 4662 Plotter, the 
following subroutine can be helpful. The subroutine is 
used to see if the Plotter's LOAD button is down, before 
any data is sent to the Plotter. If the LOAD button is 
down, then the subroutine will print a message to the 
screen and wait for the LOAD button to be released. 
After the LOAD button is released, the subroutine will 
"return." 

The subroutine tests the Plotter's processor status word to 
see if or when the LOAD button is released. Lines 1010 
and 1020 read the processor status word. Lines 1030 and 
1040 test the PSW, and lines 1050 to 1080 print the 
message. Jg) 



1990 H-9 

1919 PRINT fl,9!9 

1929 INPUT tl,9iX 

1939 X«INT<X/2t9> 

1040 IF NQT<<X''2-INT<X.'2>>*2> THEN 1899 

1839 IF H THEN 1010 

1069 H-l 

1979 PRINT "RELEASE THE LOAD BUTT0NGGG" 

1089 GO TO 1919 

1899 RETURN 
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4051 Applications Library 
Program Abstracts 

Order 

Documentation and program listings of each program are 
available/or a nominal charge. Programs will be put on tape for a 
small recording fee per program plus the charge for the tape 
cartridge, One tape will hold several programs. (The program 
material contained herein is supplied without warranty or 
representation of any kind. Tektronix, Inc. assumes no respon- 
sibility and shall have no liability, consequential or otherwise, of 
anv kind arising from the use of this program material or any part 
thereof) 

Domestic U.S. Prices: 

Documentation and listings $15 per program 

Recording Fee 2 per program 

Tape Cartridge 26 per tape 



Contribute 

Contribute one program to the Library and receive three in 
exchange. Send in the membership card from your 405 1 Graphic 
System Reference Manual to get the details. Or call us (503) 682- 
34 U, ext. 2618. 

Forms 

Please use the Applications Library Order Form. Order forms 
are included in the Membership Packet and are available from 
your local Tektronix Sales Engineer. 

Outside U.S. 

Program contributions or orders outside the U.S. must be 
processed through the local Tektronix sales office or sent to one 
of the Libraries serving your area. See Library Addresses section. 
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ABSTRACT NUMBER: 51/07-6108/0 

Title: RECORDKEEP II 

Author: Jim Gish 

Irvine Field Office 
Tektronix, Inc. 
Memory Requirement: 16K 
Peripherals: 4907 File Manager 

Optional— .463! Hard Copy Unit 
464 1 Printer 
Statements: 2034 
Files: 13 ASCII Program 

Tables and lists are two common ways in which people 
organize information to make comparisons or summarize 
data. RECORDKEEP II is a simple package that allows 
storing such a table on the 4907 File Manager. Reports 
can then be quickly generated from this table (database) 
through the RECORDKEEP II commands that allow 
editing, sorting, and table listing. 

Twelve commands are available. They are broken down 
into three functional groups. The first group provides the 
commands necessary to edit the table, which we will call a 
database or file. Commands in the second group include 
file management operations that allow saving databases 
and creating smaller tables from existing databases. 
These tables can also be sorted and listed to emphasize 
their content by the third functional group. 
RECORDKEEP II can be applied in areas where you 
need to store and manipulate small inventories, sales 
history records, personnel records, patient history, or 
catalogues. 

This software helps you organize and store information as 
well as put the information to work by summarizing it in a 
more effective tabular form. 



Command 
Command 
Command 
Command 
Command 
Command 
Command 7 
Command 8 
Command 9 
Command 10 
Command 1 1 
Command 12 



Add Items to Database 

Delete Items From Database 

Modify Items in Database 

List a Database 

Create a Local Database 

Archive a Local Database 

Make Local Databases From Archive t 

List Directory ^ 

Delete Archived Database 

Sort a Database 

List Database With Subtotals 

Stop 
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ABSTRACT NUMBER: 51/00-6109/0 

Title: Inventory File System 

Author: John R. Zeigler 
Tektronix, Inc. 
Memory Requirement: 32K 
Peripherals: Optional— 4641 Printer 
Statements: 406 
Files: 2 ASCII Program 

24 Data Files Required 

The program implements a small inventory system. You 
can create files of various items where each item is 
composed of a part number, quantity, location, descrip- 
tion, and cost. Each data file is assigned a name which is 
kept in file 14, thus forming a directory to the inventory. 

Data files may be modified in any of the five fields: part 
number, quantity, location, description, or cost. User 
Definable Keys allow you to sort files, update files to tape, 
display the file, display the next line of a file, type the file 
to the 4641 printer, search the entire file listing for each 
occurrence of a desired string in a particular field, search 
for a part number and stop, modify a data entry, open a 
file, and create the directory. 

A unique feature of the Inventory File System is that the 
directory may be accessed j ust as any data file. This means 



you can delete a file even though no User-Definable Key is 
provided for the task. The extra effort required to create 
the directory and to delete files assures that files won't be 
inadvertently deleted. 
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ABSTRACT NUMBER: 51/07-8025/0 

Title: 4907 UTILITY 

Author: John R. Carter, Sr. 

Santa Clara Field Office 

Tektronix, Inc. 
Memory Requirement: 8K 
Peripherals: 4907 File Manager 
Statements: 922 
Files: 14 ASCII Program 
40 ASCII Data 

UTILITY is a package of routines that offer the new user 
of a 4907 the ability to learn the machine by example. 

Not all commands are used in this package as there are 
some whose inherent simplicity can neither be further 
simplified nor exemplified. UTILITY details the more 
difficult commands to remember and use. 

Each of the commands used offers two options: 1) how to 
input the command on the keyboard and 2) how to use 
the command in a program. There is a HELP routine 
which can review all commands in a brief form, gives 
more detail than the reference guide and less than the 
reference manual, is a practical on-line combination of 
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both. For those who cannot remember all the commands, 
there is a LIST routine. 

The first thing a typical user might want to do is write data 
into a file and then read it back and later modify it. There 
are four routines which access any file, or create one, in 
ASCII or BINARY. The four routines are 1) Sequential 
in ASCII; 2) Sequential Binary (will handle numeric and 
alphanumeric data); 3) Random Access ASCII; and 
4) Random Access Binary (will handle alphanumeric 
only). 

It is helpful to use the reference manual to supplement this 
guide, for details beyond the scope of this application. 



T ™ 4907 UTILITY 
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ABSTRACT NUMBER: 51/00-4001/0 

Title: COBALT-60 CALIBRATION CHART 

Author: C.S. Narayanan 

Lutheran Hospital 

Ft. Wayne, Ind. 
Memory Requirement: 8K 
Peripherals: Optional — 463 1 Hard Copy Unit 
Statements: 48 
Files: I ASCII Program 

The program calibrates treatment time for CO-60 
Teletherapy units, which are used to treat cancer patients. 
The CO-60 radioactive source decays (loses its strength) 
according to its half life. The output of the therapy unit 
must be calibrated and changed accordingly. This 
program will give you the output calibration. Enter the 
present output for various field sizes, and the calibrated 
output will be displayed. The display can be copied with 
the 463 1 Hard Copy Unit. 



WARNING 

The recipient of this program is solely responsible for 
checking the accuracy and appropriateness of this 
program and procedure, jg) 
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Your Application Article: A Place to Start 



( 



The TEKniques staff is always looking for interesting 
applications to share with other 4050 Series users. And we 
know that many of you are using your 405 1 in ways that 
would be of interest to other TEKniques readers. Perhaps 
you've thought that your application would be of 
particular interest, but didn't know where to start. The 
following list of questions might help. 

These questions are the basis for an applications article 
questionnaire, which we'll gladly send to interested 
contributors. However, if you're interested in featuring 
your application, just jot down the answers to these 



questions and mail them in to us. Include any other non- 
confidential background or information write-ups you 
might already have. Be sure to include your name, 
address, and phone number, so we can contact you for 
further information. 

After we've written an article about your application, 
we'll send it to you for final review and approval; you 
retain the final say on the content of the article. So, if 
you're interested in featuring your application, answer the 
appropriate questions and send them back. We'll take it 
from there. JgJ) 
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•What problems were you trying to solve with this application? 

> 



• How are you using your 4050 Series Graphic System to solve the problem? 



• What equipment configuration is used? What special hardware and or software was developed or modified? 
(Please include a diagram of the configuration.) 



What type of data goes into the system, and how? What is the output? 



• What methods were used prior to development of this application? 



• What are the advantages of the present application and equipment? Why is the graphics capability useful? 



Author Name(s) 



Organization Name 

j 



Address 



Telephone 
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Tektronix 

COMMfTTED TO EXCELLENCE 

TEKTRONIX, INC. 
Information Display Group 
Applications Library 
Group 451 
P.O. Box 500 
Beaverton, Oregon 97005 
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4051 Applications Libraries 



Africa, Europe, Middle East 

4051 Applications Library 

Tektronix International, Inc. 

European Marketing Centre 

"Bavinckstaete" 

Prof. Bavincklaan 5 

1 1 83 at Amstelveen.The Netherlands 

Australia 

405 1 Applications Library 

Tektronix Australia Pty. Limited 

Sydney 

80 Waterloo Road 

North Ryde, N.S.W. 21 13 



Canada 

4051 Applications Library 
Tektronix Canada Ltd. 
P.O. Box 6500 
Barrie, Ontario 
Canada L4M 4 V3 

Caribbean, Latin America 
and Far East (exci. Japan) 

Ms. Bev Brandon, 73-312 
Export Marketing 
Tektronix, Inc. 
P.O. Box 500 
Beaverton, Oregon 97077 
U.S.A. 



Japan 

4051 Applications Library 
Sony Tektronix Corporation 
9-31 Kitashinagawa-5 
Tokyo 141 Japan 

United States 

4051 Applications Library 
Tektronix, Inc. 
Group 451 
P.O. Box 500 
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